10 DV=PEEK(186)
20 GOTO40000
10000 D=PEEK(186):N$="EXIT 255":OPEN1,D,15,"S0:"+N$:CLOSE1:SAVEN$,D:END
40000 PRINT"[147]";:VL=53248:POKEVL+17,27:POKEVL+24,21:F$="HELLO CONNECT"
40001 Q$="R0:"+F$+"="+F$:I=DV:GOSUB40050
40002 FORI=8TO13:GOSUB40050:NEXT:FORI=15TO29:GOSUB40050:NEXT
40003 POKEVL+32,14:POKEVL+33,6:POKE646,14
40004 POKE44,8:POKE2048,0:POKE56,160:NEW
40050 CLOSE2:OPEN2,I,2:CLOSE2:IFSTTHENRETURN
40060 CLOSE15:OPEN15,I,15,Q$:INPUT#15,ER:CLOSE15:IFER<>63THENRETURN
40080 Q$=CHR$(34):POKE646,PEEK(VL+33)
40081 PRINT"[147]P[207]2048,0:P[207]44,8:P[207]43,1:P[207]56,160:P[207]55,0:CLR:L[207]"Q$F$Q$","I
40082 PRINT"RUN":POKE631,13:POKE632,13:POKE198,2:END